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THE MEETING WAS KAOS 
by King Conky 


The meeting was a short one and not a lot of new info surfaced. Paul 
Dodd is still pushing the Compsoft CP/M cards for the Rabble/OSI's and did say 
that more OSI users are needed to mount the extension if any meaningful 
software development is to take place. I believe that even though $450.00 is 
not chicken feed, the system represents extremely good valve for money when you 
consider that your OSI or Rabble system will be capable of accessing almost 
any format 8 bit CP/M, MSDOS, C, etc, software on either mini or maxi 
Floppies, concurrently. If I hadn't blown my bankroll on a Super-cheap Apple 
clone, I would have had the system installed in the 'monster' by now. I know 
that Ralph Hess has one running in his’) Rabble and is in the process of 
converting a lot of his software over to the CP/M system. 


David Anear and Jeff Rae are considering setting up a machine language 
course for the 65%2. As far as we know, there is only one school in the state 
that teaches anything on the 6592, Footscray Tech. David and Jeff are going 
to need some feedback and some help if the project is to get off the ground. 
Speaking of projects, David also suggested that something the club is badly 
lacking at present is hardware and software projects. Something that can be 
developed by a team. Suggestions were: a solderless breadboard that will plug 
into the 16/18/28 pin I/0, which will be compatable with the OSI, Rabble and 
possible even other 65@2 systems like the Apple, BBC, Atari, etc. This board 
could be like a flexible port for a variety of I/O activities ... A team to 
convert Apple (or any other) educational software to the OSI and Rabbles. 
There is a mountain of well written, fun to use, educational software 
available for the Apple, most of it with exceptional graphics which enhance 
the learning-—by-computer type of program. | 


Ray Gardiner is looking for anyone interested in running hardware based 
Floating-point maths through the 16 pin I/O. Ray also gave a brief rundown on 
the PC-84 show. Along with Ray, I think that anybody who attended would agree 
that the User Group stands were a brilliant idea. But more on that later. 
John Whitehead would like all cassette users to know that they can run Forth 
without having to upgrade to disk. He has a version configured for 24x24, 
48x3e, 64x3e and Cegmon systems and once he_ gets to know Forth a little 
better, he should be able to configure it to suit any format. Greg Kilfoyle, 
a past member, used his considerable talents to convert the once disk based 
language to run on cassette and we thank him most sincerely for his efforts. 


And now my views of the PC-84 Computer Show. This outstanding expo, held 
at the World Trade Centre, simply put, was great. Of course the big guns were 
there, with their big flashy stands, but two things made this show stand out 
From any other of its type, including audio, car etc. 

1. The marked absence of thousands of tiny, poking, game playing fingers, 
(there were still quite a few, but they didn't seem to hamper the prying eyes, 
ears and hands of those truly interested). 


2. The amount of actual, fair dinkum help that the various exhibitors and 
their reps were prepared to give. Sure they were trying to flog their . 
particular product, but the ones I spoke to, and that was a good dozen or so, 
were only too happy to sit you down in a quiet corner and go through any of 
‘the hardware/software products you were interested in, without even a hint of 
hard-sell and in some cases, not even a soft-sell. The big surprise was the 
Comments from the show-goers themselves who visited our stand on the upper 
level, (we and most other user groups were on level 3 of the 3 level show 
area). They were especially kind and appreciative of the help they got from 
KAOS on a variety of subjects from microts to programming tips. We were 
probably the most unbiased group there. They couldn't believe their eyes 
when, (on the Saturday), they saw the 'monster' and a few of it's I-nearly- 
look-as-bad partners being shown in all their glory, with boards, wires and 
chips hanging out like a hardware hacker's nightmare. I think I got more 
enquiries and requests for my psuedo German notice than Ray Gardiner got for 
his brilliant Rabble. 2 


Over the years, I have heard many raves about a particular implementation 
of high-res graphics on various micro'ts, but there were two displays at the 
show that were real eye bogglers. One that most people would expect to be 
good was the HP. This rather expensive-for-a-micro computer, had a continous 
demo running that was trific. One part of the demo started with the drawing 
of a house and tree on a dark moonless night. Dark storm clouds rolled in, 
thunder clapped and lightning flashed. Each flash of lightning highlighted 
the side of the house and tree, throwing shadows across the dark green 
landscape, with incredible speed for hi-res graphics. A window would be 1it 
From within as if an inside light had been turned on. 


But the best display I saw was from a system I and and few others had 
heard of. A 512K, 19Meg hard-disk, 80186 system, punching into a 2g" Hi-res 
RGB monitor. It was creating pictures of photographic quality at an 
unbelievable rate. The exhibitors were Microprocessor Applications Pty Ltd, 
and this particular system was just $108,800 complete. When I think of the 
15,020 tax-free dollars my boss spent on a Dec Rainbow —- with 10M hard-disk 
and limited software, no graphics mode, where is the video ram - I don't know, 
how do you peek the keyboard - I don't know, system, I feel like crying. Bye 
for now. 


‘ AUSTRALIAN OTHELLO OPEN 


We are searching for the Australian Othello representative who will 
compete with international Othello champions for the 1984 title due to be held 
in November 1984. 


The first round of the competition has been designed to be very simple, 
however the complexity of the competition comes in round 2 when the computer 
issues more difficult Othello puzzles for the competitors. It is round 2 and 
3 that the computer enthusiasts should enjoy. 


We are offering over 4@@ prizes so there is a real possibility of winning 
something. Prizes include a trip for e2@ to Honolulu and 6 TAA flights. 


Othello's greatest strength seems to be the fact that it can be played at 
any level, from the youngest starter to the oldest player; it is fun for the 
whole family to play together. Computer buffs would find the challenge of the 
Othello competition stimulating and lots of fun. We are expecting to find our 
best challenges for the Othello title to come from computer people. The rules 
are straight forward to learn though the game itself might take a lifetime to 
master. There are Othello Clubs and Associations springing up all over the 
world and the Australian Association is about to jump! 


Please find entry forms included in this issue of KAOS magazine, if 
Further entry forms are required, contact KAOS. 


Kerry Whelen 

For The Australian Othello Association Inc. 
Incorporated under the Associations Act 1981 
as a non profit Association. 


NB Please forward completed entry forms to: 


NOTE As the competition closes on September 6th, interstate members 
requiring extra entry forms should photocopy the one enclosed. 
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CONTROLLING A.C. DEVICES 


One of the possible applications for a computer is the control of AC devices, 
motors, heaters, lights and etc. To interface these mains powered items 
safely, good isolation between mains and computer is a must. Another desirable 
requirement is that the switching device should not cause noise, audible or 
electrical. Electrical noise interferes with the trouble free operation of 
computers, and also can annoy radio and television audiences. 


An ideal device is a Crydom Solid State Relay, made by International Rectifier 
in a big range of voltage and current ratings. A D2402 model can handle 

240 volts at 2 amps. Any DC voltage between 3 and 32 can be used to turn it on. 
Connection is very simple as the diagram below shows, and the isolation is 2kV. 


Inside the relay is a triac and zero crossing detector. This latter circuit is 
used to switch the triac on and off a hundred times per second, at the point 
where the voltage and current flowing is at a minimum - meaning no electrical 
interference, and also useful for heater element control by duty cycle. 


The most obvious use for such a circuit is the control of disk motors on OSI 
5" drives which run continuously at 110 volts. Control could be as simple as 
a toggle switch or a microswitch fitted to the drive door. Alternately, a 
small circuit could be devised to select motor-on whenever the drive was 
accessed. 
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SOFTWARE REVIEW - X-Wing Fighter 


X-Wing Fighter is a shoot-em-down arcade game, written in Basic, and requiring 
8k. The player is a rear gunner in a spaceship, and the mission is to destroy 
the enemy X-Wing fighters. What you see on the screen is some stars and your 
sunsight. On the bottom of the screen are the number of fighters hit, the 
number that have escaped, and.your remaining ammunition. You also get messages 
like "Here comes another one!". 


To steer, vou use keys 1 to 8. To make the game extra difficult, the enemy 
dodge around a lot. Being the rear gunner, the enemy moves in the opposite 
direction to your ship. (A little renumbering of the steering map will get 
over the latter annoyance) You can only destroy an X-Wing with a direct hit. 


The game is fairly slow and frustrating to play. With a cycle refresh time of 
about half a second, it's also jerky, and the delay between hitting the 
spacebar and the phaser firing is devastating. All you can do is keep the 
enemy near the centre of the sights and blast away, hoping that he'll jitter 
in the right direction and get blasted. The enemy fighters don't even fire 
back at you. If you take too long to pin one down, he escapes, and you return 
in disgrace to the Federation. 


Not a lot of fun. The OSUG library has one for members to try out at the 
usual postage rates. 


ow feast _—— — —_ — om our eect —_e om —_— — — ae — = — — — — — teed od wo — —_ — — ane — —_ —_— — —_— — — — — 


Next Month:- Some useful information for disk users. Another review. 
More changes to CEGMON in the disk bootstrap area. 
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— SUPERBOARD — 


CEGMON MONITOR 


CEGMON is a replacement EPROM for the old SYNMON in the CIP/UKI01 computers. 
Developed in the UK in 1980, and sold in the US as the CIE by Aardvark and 
others, it offers many extra facilities which make the C1P a joy to use. 

A brief summary appears below, together with information on useful mods to 
enable it's use for almost any screen/keyboard format. 


Features:- 


(1) A screen editor very similar in operation to the one in Dabug 3, which 
makes reworking of Basic lines very easy. Insert, delete, copy, and 
concatenate with auto-repeat on all functions. 

(2) A powerful screen management system. Easily controlled windows provide 
mixed text and graphics, protected non-scrolling areas, mixed scrolling 
and non-scrolling areas, full cursor controls, and selective screen and 
window clears. 

(3) A machine code monitor which greatly simplifies programming. Offers a 
tabular display of hex, facility to input ascii text directly, memory 
block move, breakpoint facility, and M/C SAVE routine. 

(4) A keyboard with proper operation when shift lock is up, just like a 
standard typewriter. Both shift keys decoded the same, RETURN is always 
return and etc. 

(5) Highly compatible with the standard monitor. A single POKE will enable 
use of the old SBF2D routine. All major subroutine entry points are 
identical. Inputs and Outputs are all vectored through RAM. 


—_—-—_—e— oe ollie eee eee 


CHANGES TO CEGMON FOR OTHER FORMATS | 
The table below gives changes to adapt CEGMON for most other formats in use. 


ADDRESS 24x24 32x48 =‘32x64 C4Keybd Reasons 


F819 20 40 40 

ao - an . $7 Command 16 bytes instead of 8 
FB81 20 40 40 

FB8B D4 D8 D8 

FBBC 17 2F 3F 

FBBD 85 CC 80 

FBBF 85 CC 80 

FBCO D3 D/ D/ Window set up table 
FBC2 85 CG 80 

FBC5 85 CC 80 

FBCB 85 CC 80 

FDFO 20 40 40 

FE2D 20 40 40 

FE3B D3 D/ D7 

FE62 04 08 08 )Pages for screen clear 
FFEO 85 4B 40 

FFE] 17 2F 3F rr old SBF2D screen handler 
FFE2 00 Ol Ol 

aes = {spacebar detect 

FB9A FE Ol 

FBA1 70 50 

FBAG FB 04 im C detect 

FBAB 70 50 

FCBF FF 00 

FCC4 FF 00 Keyboard non-inverted 
FCD3 FF 00 


CEGMON could very easily be adapted for any screen format including 25x80. 


CEGMON ENHANCEMENTS by John Froggatt 


After I adapted the standard CEGMON to suit my Cl with TASAN board, I set out 
to make some improvements. The use of a C4 keyboard frees up a small area 
which can be used to fix that OM ERROR after a warmstart - permanently. 
Changes: - 


FDO6 20 BE FC change to 8D 00 DF ) In keyboard routine 


FD78 20 BE FC - 8D 00 DF 

FF32 4C 00 00 i "  4C BE FC In reset routine 

FCBE A2 FF LDX #SFF : 
FCCO 86 88 STX $88 Reset the stackpointer 
FCC2 OA TXS and jump to warmstart. 


FCC3 6C-01 00 JMP ($0001) Location $0000 is free. 
The next change was to the editor. After nearly a year I found I was still 
pressing the wrong keys to steer the cursor around. I decided on a more 
logical arrangement :- 


FAFO 04 change to 13 Right now CTRL § 
FAF4 13 bs _ 17 Up now CTRL W 
FAF8 06 ss ? 1A Down now CTRL Z 


Left remains CTRL A and the above arrangement seems easier to remember. 
I was never satisfied with the interrupt vectors being in the middle of 
the stack, and decided to move them to page 2:- 


FFFA 30 O1 change to 35 02 NMI now at $0235 
FFFE CO Ol ae " 38 02 IRQ " " $0238 
F954 BF Ol " " 37 02 CEGMON breakpoint routine 


EXMON needs to be changed to suit the above :- 


O80E CO Ol change to 38 Q2 

0814 cl Ol " " 39 02 EXMON breakpoint routine 

O81A C2 01 i " 3A 02 
At this point, we leave the disk users. Since I bought a BBC micro, I am 
unlikely to upgrade the C4 to disk. The CEGMON disk bootstrap is from — 
FCOO to FCA5, and I wanted a listing halt routine:- 


FC95 48 PHA Save character in accum 
FC96 AY 02 LDA #$02 

FC98 8D 00 DF STA _ SDFOO Keyboard address 

FC9B AD 00 DF LDA _ SDFOO Is key a spacebar? 

FCIE 29 10 AND #$10 

FCAO DO F4 BNE SFC96 Yes! 

FCA2 68 PLA 

FCA3 4C 9B FF JMP SFF9B CEGMON output handler 


To switch this into the output routine, you change the table copied by 
CEGMON into page 2 on a reset (BREAK) :- 


FFB4 9B FF change to 95 FC 
Now, whenever the spacebar is pressed during a listing it will halt while 
the spacebar is held down. This has a disadvantage that the auto-repeat on 
spacebar will be lost. It can be regained with POKE 538,155:POKE 539,255. 
I have EXMON in EPROM at E800, so the next change gives an E/C/W/M? menu. 
Selecting E will jump to EXMON instead of the disk bootstrap. 

FF21 and FCF8 44 change to 45 E in place of D 

FF 26 : FC . "  E8 Jump to EXMON 


The only bug I have found with the above occurs if you try to Warmstart 
after using EXMON. The machine used to find it's way back into EXMON but now 


it hangs. Even this problem disappears with the use of the OSUG BASIC 4 chip. 
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Some months ago thene war a nequeat for nelp from a memben who war UALNG 
a fandy prenter and havin nobLem with double Line feed, /wo membens sent 
fixer, the finat was in Laat months newaletten, the recond is printed below. 


CARRIAGE RETURN TRAP ROUTINE 


by Wannen [ ane. 


My system is a converted C1, now a C4 (almost!), so I cannot guarantee 
that the C1 Mini-Floppy version of this routine will run, as I cannot test it 
with my C4 DOS. 


TERMOT or terminal output routine resides at $24CD for both C1 and C4. 
This is the serial (ACIA) or BASIC Device 1 driver. Unfortunately, there is 
not room to accomodate any additional code within this routine, so a JSR at 


$2406 allows us to fit our trap at any location we desire. On examining a 
part of the C1 DOS routine, it appears there is a string of zeros prior to the 
serial driver, so this would appear to be a possible location for the code. 
If you have a complete disassembly, you may prefer to place the code 


elsewhere. (Don't forget to change the JSR address at $24D6. ) 


In operation the routine checks for the presence of a CR rather than a 
LF, otherwise -WP 65@2's page feed does not work, since this uses the LF 
character to achieve this. It appears that if the Tandy VII receives a LF 
character, it adds a CR, and conversely adds a LF if it receives a CR. 


I have included source code for C4 and proposed C1 traps, the C4 routine 


written over BASIC Device 8 routine, on the premise that it is not used. The 
most convenient method of entering this code is via a few line of BASIC 
included within BEXEC*, so these have been included. 

10 ; C1 VERSION 12 ; C4 VERSION 

ef 24C5= TRAP = $24C5 eB e24Be= TRAP = $24Be 

38 24C5 *= TRAP 38 24B2 *= TRAP 

42 : 40 : 

5@ 24C5 c9@D CMP #$@D 52 24Be C9PD CMP #$@D 

68 2407 FRG3 BEQ RETURN 62 e4B4 FRd3 BEQ RETURN 

746 24C9 S80G1FA STA $FQO1 70 24B6 8DO1FO STA $FOO1 x 

84 e24CC 60 RETURN RTS 80 e24B9 62 RETURN RTS 

90 : 98 - 

1080 e24D6 x= $2406 188 2406 — x= Ged4D6 

112 ; 110 : 

120 2406 egcse4 JSR TRAP 128 2406 esBee4 JSR TRAP 

130 »END 132 » END 


** NOTE: $FC21 for true C4. 


14 REM LINE NUMBERS MAY REQUIRE CHANGING TO FIT BEXEC* 
2 REM C1 DOS VERSION BUT NOT TESTED 

25 POKE943@, 32:POKE9431, 197: POKE9432, 36 

38 FORX=9413T09420:READA: POKEX, A:NEXT 

35 DATA 201,13,240,3,141,1,249,96 


4 REM LINE NUMBERS MAY REQUIRE CHANGING TO FIT BEXEC% 
2 REM C4 DOS VERSION 

25 POKE9430@, 32:POKE9431, 178:POKE9432, 36 

30 FORX=9394T094@1:READA:POKEX, A:NEXT 

35 DATA 201,13,240,3,141,1,240,96 

NOTE: For a true C4 - DATA 201,13,240,3,141,1,252,96 
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APPLE JOYSTICK 
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Constructing an Apple joystick. 

Apple joysticks are expensive to buy, but cheap to make yourself. Especially if you are 
sed — a joystick to play games with, as accuracy is not as important as it being rugged 
and cheap. 

In keeping with these requirements I chose to use the joystick mechanism which is 
readily obtainable from a Tandy or Dick Smith store, and costs about $5.00. The mechanism 
comes with built in 100K pots and is equipped with a small lever which although not 
self-centering; is light and easy to operate. While you are in the store getting the joystick, 
buy a small plastic jiffy box to hold it. You will need one 10x5.5x4 cm in size to hold the 
joystick mechanism and the two Fire buttons. 

The Fire buttons, are in my opinion, the most important; they must have a light action 
and short travel as there is nothing worse than being half way through an Alien attack 
when your thumb falls off due to the 10 ton pressure required to fire your cannon. 

The best firing buttons are either those made using miniture micro swiches or the C&K 
$121 push button switch. Unfortunatly neither Tandy or Dick Smith sell the C&K switches, 
but Magraths, Radio Parts, Ellistronics, and Rod Irving do. You will also need the Plunger 
buttons to go with the 8121 switches. The total cost of each switch is about $3.50, not cheap, 
but well worth it. 

You will also need 1.5 metres of 6 core cabie or ribbon cable and a 16 pin dil header to 
plug into the Apple Paddle connector. The best ones are those sold by Magraths, they re made 
by Camdon and have a fiber glass body and therefore don't melt when you solder them. They 
cost about $1.75. 

The circuit itself is straight forward but the values of Cl and (2 are not. The problem is 
that the Apple joystick feeds a 558 timer which expectsthe X & Y pots to cover a range of 0 to 
150k ohms. As our pots only cover 0 to 100k we have to increase the time constant the timer 
sees. As the time constant varies slightly from machine to machine and the tolarance on the 
joystick pots is about 20%, you are going to have to select the values for C1 & C2. With the 
joystick assembled but no C1 or C2 fitted, run the test program; you should get a range of 0 to 
255 for the full travel of the stick in either X or Y. Without the capacitors you will probably 
only get to 200 so, with a pair of clip leads, clip a 0.01 ufd capacitor between the wiper of the 
pot you are testing and GRD. If it still does not get there, then increase the value till it does. If 
on the other hand it reaches 255 with the stick still only part way through its travel, then 


reduce the value. 
When you have finished you should have a stick that goes from 0 to 255 in both 


directions, with the stick returning a value of approx 127 when the stick is vertical. Solder 
your capacitors into circuit, assemble the rest of the box and go play. 


10 REM JOYSTICK TEST 
20 HOME 

SOPRINT“X VALUE = °; 
PDL(O) :PRINT 

40F ORX=1 TO 10: NEXT 
DOPRINT"Y VALUE = ~; 
PDL(1) -PRIMT 
60B1=PEEK(- 16287): 
B2=PEEK(- 16286) 

7O IF BI >127 THER A$ 
="CLOSED”"GOTO 90 
GO AS$="OPER” 

90 iF B2 »>127 THER BE 
="CLOSED” :GOTO110 


EAMES &£ fG 1 @08$= “OPEN” 


TIOPRIMY “F IRED="-Ag- 
LANNE CT OR " F IRE2=" -B$ -GOTO20 


i 
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By the way, this article was written on the Appie Macintosh using MACPAINT for the 
diagrams, and MACWRITE for the text................. D. J. Amear. | 
Here is a sample of some of the Graphics that can be done on the MAC. 


‘GET SHART JOIN KAOS 


MEETING KAOS SYDNEY 
by Nonman bace 


Since my last report of our April meeting we have had only one other in 
June. Attendance is still low and is) disappointing. Our April meeting 
attracted 8 members and 4 computers while the June meeting saw 7 members and 3 
computers. 


Peter Jensen used his amateur radio gear to try and arrange a link to the 


Melbourne meeting. Contact was established but conditions were not good and 
the signal only poor to fair, barely reasonable for voice but out of the 
question for data exchange. Peter is going to try again during the August 
meeting. 


Several of our members are experimenting with 'VEKTRIX! games units to 
see if they can be used as graphics peripherals. More on this later. CP/M 
machines are beginning to surface. 


The next bi-monthly meeting will be at the Lugarno Girl Guides Hall on 
Sunday August e6th any time after 19 am. For information contact: 
N. Bate or N. Bissett | 
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UNDERSTANDING FORTH Part oa 
by Ray Gandinen 


This month we will examine the two stacks in the Forth system and explain 
the details of stack manipulations. 
PARAMETER STACK 
All parameter passing and arithmetic calculation takes place on the 
parameter stack, usually just called the STACK. 
Before we begin to explore stack operators in detail a description of the 
stack is required so that we may visualise what is taking place. 


The Forth stacks are both LIFO (last in first out) stacks and only the 
top item of the stack is visable directly at any given time. Data is returned 
in the reverse order to the order that it was entered (last in first out). 


A LIFO stack may ~be pictured as a spring loaded device (Leo Brodie has 
some nice cartoons for this). 
If we type 3 4+. <cr> what happens?’ Examining the activity pictorially 
as the input is interpreted. 


3 4 + . At this point the stack is 

a returned to the same state 
3 A 7 -- as it was initially. 

—_ a oe a You should make sure that 

eee es ee al your definitions do not 


leave rubbish behind. 
DESCRIPTION 

When 3 is encountered the interpreter pushes 3 onto the stack after 
First searching the dictionary for a word called "3", 
Assuming that no. definition is found, interpret then calls a word called 
NUMBER which attempts to convert the ASCII character "3" into a binary number. 
If this process succeedes the binary number is left on the stack. The same 
thing happens with the "4", The next delimited character found from the input 
stream by the interpreter is "+" which is a standard Forth word defining the 
16 bit signed fixed point addition process. (Adds tem together dummy !). 
Remember that the number on the stack is in binary after NUMBER. Finally the 
Forth word DOT ".'! takes the top of stack and converts it to an ASCII string 
and outputs the string to the terminal. 


Definitions of INTERPRET NUMBER and . will be given in the section 
dealing with the interpreter. It is important to note that the string 
conversions for NUMBER and. both utilize the system variable BASE - more on 
this shortly. | 
: STACK MANIPULATIONS 

In order to describe stack effects of various operators we need to 
introduce the standard stack notation system used in documenting Forth words. 


Word Pronounced Stack Stack Comments 
Before After 
DUP dupe" w 1 wit wi copy top of stack 
SWAP "swap" wit we we wi reverse order 
OVER "over" w1 we w1 we wt copy second item 
ROT "rote" wi we w3 we w3 wi rotate top three 
DROP "drop" w 1 Sens destroy top 
STACK NOTATION 

Stack Number Type Range in Decimal 

Abbrev. 

Flag boolean Z=False 1=true 

b bit Zor 1 

char character type @ to 27 

8b byte 

n number signed -32768 to +32767 

+n positive number Z to +32767 

u : unsigned number ) to +65535 
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STACK NOTATION 


Reece Number Type Range in Decimal 
rev. 

w signed or unsigned 

(nh or u) 
addr same as u, 
usually addresses 

d double number -2,147,483,648 to +2,147,483,647 

d+ Signed double 0 to +4,294,967,295 
:STACK ARITHMETIC 

Word Pronounced Stack Stack Comments 

Before After 

+e Nolus' n1 ne n1+ne Add top two items 

- minus" n1 ne n1-ne Subtract top two 

* "star" n1 ne nt%*ne multiply top two 

/ "slash" n1 ne n1/ne divide top two 

MOD mod" n1 ne n3 leave remainder 

/MOD "slash mod™ ni ne n3 n4 leave remainder 8&8 quotient 

MIN mint n1 ne n3 leave smallest 

MAX “maxt! nt ne n3 leave largest 

ABS Wabs'" n1 ul absolute value 


: EXAMPLES 


4. Calculate the temperature in degrees F given degrees C on the stack. 
C->F 9% 5 / 32+ ; (degrees C --- degrees F) 


Testing this definition is simply a case of entering a range of numbers 
to verify that the correct calculation is being carried out. 
15° C->F ~~ 59 OK 
100 C->F . e212 OK 


e. The height above ground of a falling object can be determined at any time 
(t) aif it's initial height (ho) and initial downward velocity (vo) are known. 
The height of the object is given by the formula 

height = ho - (voxt) - 32 txt 

where height is in feet and velocity is in feet per second. We can write a 
Forth definition which will take an initial height, initial velocity, and time 
t, from the stack and leave the final height of the object after t seconds. 

>: HEIGHT SWAP OVER *« SWAP DUP * 32 * + —- ; 


3 
initial height 1@9@ Ft, initial velocity 19@ ft/sec, how high after 3 seconds? 


1900 198 3 HEIGHT . 412 OK 


The detailed stack manipulation can now be examined step by step. 


Word Stack Comment 
1020 100 3 ho vo t 
SWAP 19208 3 190 Swaps time and velocity 
OVER 1900 3 190 3 copy time to top of stack 
1000 3 300 calculates voxt 
SWAP 1900 320 3 get time back to top 
DUP 19200 300 3 3 prepare to square t 
* 1900 300 9 calculate txt 
32 190808 320 9 3e gravity enters the scene 
i 1200 300 288 calculate 32txt 
+ 12820 588 ho} (vox*xt+3etxt) 
~ 412 ho - (voxt+3etx*t ) 


The result is left on the stack for the next word. 


A cleaned up and polished version of HEIGHT is now presented, although the 
basic word is the same the presentation is perhaps a little clearer. 
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HEIGHT? CR .' Enter initial height ? ' QUERY INTERPRET 
CR .™ Enter initial velocity? '"* QUERY INTERPRET 


CR .'' Enter time delay ™ QUERY INTERPRET 
CR .'tt After '* DUP . .'' seconds " 
CR .™ the object will be '"' HEIGHT @ MAX 


. feet above the ground ' CR CR ; 
Note the @ MAX after HEIGHT so that when an object hits the ground it stays 
there. 
RETURN STACK 

The return stack is used for holding the return address of the calling 
Forth word, as such it is important that it is not unwittingly corrupted, or 
you will find yourself wondering what happened to the system. 
The return stack is also used to hold loop indices for some of the Forth 


control structures, more on this when we look at control structures next 
month. For mow we will consider the word which allow the programmer to make 
temporary ue of the return stack. However be careful. 

>R "' to R ' moves top of parameter stack to return stack 

R> '™ R from! moves top of return stack to parameter stack 

eo eR copies non-destructively top of return stack to parameter stack 


USING THE RETURN STACK FOR TEMPORARY STORAGE 
The use of R> must be balanced by >R within the definition, failure to do 
this will result in a system crash (usually). Some Forth words actually 
manipulate the return address to achieve certain results, like (.') which 


manipulates the return address to step cover an embedded string. Also words 
like EXIT which discard the return address can be used to control the system. 
EXIT R> DROP ; 9 (what could be simpler) 


REVERSE POLISH NOTATION VERSUS ALGEBRAIC 
One of the hardest things for a beginner in Forth to grasp is the post- 

Fix notation which seems to pervade the language. From our earliest days in 
the classroom we are taught that 1+1=2 is the natural order of the world and 
now Forth is telling us that inserting the operator "+" cannot be logical 
until we have something to operate on. All, repeat ALL languages must 
translate from algebraic notation to reverse polish before any code can be 
executed. A direct result of adopting INFIX is the need to establish the 
operator precedences, remember BOMDAS? Consider the following example. 

6X 5+ 11-3 
There are a multitude of answers to the value of the above expression 
depending on which operator has precedence as decided by the positioning of 
some brackets which will settle the issue of what to do first. Before someone 
takes me to task and points out that "X'™ has higher precedence than ‘+!’ and 
the answer is 38, the POSTFIX requires no confusing ideas of what to do first, 
the order is specified by the order on the stack. ie. 

65%* 14+ 3 -. 38 6xX5+11- 3 
or 6511+* 3-. 93 6 (5 + 11) - 3 


At the very heart of this issue is the arbitary decision to teach infix 
notation until we all succumb to the false belief that infix is the natural 
order of the world. 

During this series of articles I am going to refrain from any attempt to 
categorise Forth or compare it to other languages, there is far too much 
involved to even try. 

EXERCISES 
1. Convert the following into postfix notation 
(i) kik*kakaka + kekaka + kK3B%xXaQ + k4 
(ii) (atb) / (a-b) 
2. Write a Forth word to calculate the points difference for a football match 
where the scores are in goals and behinds ie. 11 13 9 25 PWIN returns 
the winning/losing margin. 
: ANSWERS TO. PART 1 EXERCISES 
1. : Lance. .'? Leventhal " ; e. : Compsoft ." 428-5269 BH " 
Ji 2 merci ."' thank you ' 3; +: pour .** for ™ ; : Fleurs ." flowers "t 

: le .'' the ™ ; merci pour le fleurs ---> thank you for the flowers 


KAOS-W.A. 


Firstly, I must apologise to those people who turned up to the meeting 
according to the date I mentioned in my previous report (a Saturday) or on the 
Following Sunday. I must have been iooking at the wrong month when I worked 
out the date. 


The last meeting (which never the less was well attended) did take place 
on Sunday 15/7/84. Apart from the usual sharing and discussion which took 
place, a decision was made to hold a more informal meeting (if that is 
possible) on the third Sunday of every month at 2.088 pm. This came about to 
help our newer members and for those people who developed problems and would 
like to talk to others, other than at our usual bi-monthly meetings. These 
new meetings are to take place at the home of Gary Giles, 


The first meeting will take place on Sunday 19/88/84. 


will possibly ee have occured when you receive this newsletter. 
Our mext meetings are: 


It 


4. Sunday 19 aug. 2.88pm at Lot 74 Murchison Way, Gosnells (cnr DeGrey Cl) 
2. Sunday 16 Sept 2.04pm at Guild House, 56 Kishorne Rd, Mt Pleasant 
3. Sunday 21 Oct. 2.88pm at Lot 74 Murchison Way, Gosnells (cnr DeGrey Cl) 


Gerry Ligtermoet 


ADAPTING AN APPLE 8% COLUMN CARD TO OSI 
by Danny lock 


Apple 8@ column card copies can now be purchased for less than $190.00, 
so I decided to adapt one of them to suit OSI (or any memory mapped computer) 
rather than build one from scratch myself. Most 8M column cards use the 6845 
CRTC chip, which means many screen formats are available. I have used 80x24, 
64x3e, 48x12 and e24xe4 successfully so far and a 132 column screen should be 
possible. 


Adapting this card to OSI is easy enough but it should only be tackled if 
you have a reasonable knowledge of hardware and can find your way around a 
Rabble expansion board well enough to locate the necessary signals for the 
Apple edge connector. 


The card that I purchased is a copy of the Videx Videoterm card, it is 
available from Australian Video Presentations in Melbourne. The Videoterm 
card features its own clock (17.43 MHz), eK of 2114L RAM, room for expanded 
character sets, reverse video capability, light pen (you have to build your 
own pen), a character set which includes a comprehensive line drawing set and 
special characters to allow ‘chunky’ graphics of 8@x72 (in the 88 column mode) 
and characters for ‘display function't as is available on some terminals (ie. 
characters for <cr>, <lf>, <bs> etc.). The display is clear, steady and uses 
well formed characters. 


In order to use the card with my OSI C1P with Rabble expansion board, I 
nstalled an edge connector socket in the Rabble prototype area. The socket 
is a 5@ way, @.1'' spacing type as used for Apple I/O slots. It is not the 
same width as a chip, but the pins can be bent far enough to go through the 
holes in the prototype area. The card mounts at right angles to the Rabble 


exp. board, so if you have your board in the same case as your Superboard or 
whatever, it probably wontt fit and you will have to devise another method of 
mounting. 


AS my main reason for installing this card is to convert to a C4 
lookalike and I want to use software available for the Rabble machine, I also 
installed eK scratch RAM at $C8@@. The decoding for this and the 2K video RAM 
on the Videoterm card can be achieved with one 74LS139 chip in the prototype 
area (see circuit). The necessary signals to drive the video card are: GND, 
+#5V, RESET, DEVICE SELECT, Q3, D@-D7, AZ-A1G, I/0 STROBE and R/W. All will be 
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Familiar except Q3 which is an Apple signal used to enable writing only during 
phase two clock when addresses have stabilised. The circuit used for the 
decoder uses phase two so this one (Q3) can simply be grounded. Be careful 
with the other enables which uses negative logic, DEVICE SELECT, I/O STROBE 
and RESET are all active low. R/W is low for the write cycle. Use buffered 
Signals if at all possible. 


| Now a word about Apple I/0 slot conventions. Apple use three select 

Signals to operate the _ slots. The first is called Device Select, and it 
allows access to hardware and the registers of the CRTC chip. The output of 
decoder chip IC8 pin 9 on the Rabble expansion board is suitable. It will 
Give the CRTC addresses $C@1C-$CG@10 (also $CO1E-$CO1F but that's not much 
waste). The second signal is I/0 Strobe which, on the Apple, selects 
addresses $C8@00-$CFFF for whichever I/0 slot is being used (there are hardware 
latches to turn each card's $C8@@-$CFFF area on and off). With some small 
modifications to the card I used this as my video RAM select $D@@0-$D7FF, 
which comes from the 139 decoder in the proto area. Lastly, Apple use a 
Signal called I/0 SELECT to select an on-board ROM, which, as it is filled 
with Apple screen driver routines, is useless to us. 


The 2K RAM on the video card is, unfortunately, paged as four pages 
controlled by two latches, so I pulled the chip containing the latches (it is 
labelled U8). Luckily the card is completely socketed, and this is easy to 
do. With the chip out the two upper address lines of the RAM are free and can 
be connected direct to the processor address lines which are available on the 
Apple edge connector. While I was doing this I also removed U3 (the EPROM) to 


reduce current and possibly to reuse later. AQ and A1@ can be found on UY, 
pins 3 and e2@ respectively. Connect these pins to U16, pins 5 and 11 
respectively. Next remove Ue4, bend pin 18 out so that it won't go back in 


the socket when you replace the chip, then replace the chip. This allows us 
to connect to pin 10 without cutting tracks. Do the same trick to U2 pin 5. 
Now unsolder the diode (there is only one) at the positive end and leave it 
clear of the board. Connect the positive end to U2 pin 5 (sticking out) and 
U2 pin 6 (still in the socket) and also to U24 pin 18. You have just changed 
the I/0 STROBE into a video RAM select, which will come from the 139 decoder 
in the Rabble prototype area. (To appreciate the above mess it is necessary 
to study the circuit diagram.) The circuit diagram in the Videoterm manual is 


very small, so I don't know how well it will reproduce in the newsletter. If 
it is unclear TI will send multiple copies of my original to KAOS for anyone 
who needs one. I -recommend that you buy the manual (mine was about $9.90) as 


it contains much information, such as character sets, reverse video options 
etc., that will be very useful. 

If you use C4 software and 64x32 mode, the display works very well and 
all that is necessary for you to add is a setup routine for the CTRC 
registers. This can be done as an addition to the startup sequence in EPROM 
so that you have video when you turn the machine on, or as part of the DOS 
bootup (from BEXEC* if you like). RESET does not reset the CRTC registers, so 
that once started, you have video until you remove power from the board. 
Software to drive 8@ columns is apparently available for Rabble 65 type 
computer's and for the CP/M system from Compsoft. At present I am awaiting the 
arrival of my CP/M system which at first I will use with 64x32 format, but as 
soon as I get it going I will be moving over to 8@xe4. The only item I am not 
sure about, with regard to complete compatability, is reverse video. The 
video card uses the most significant bit of video memory as the reverse video 
bit, if that option is selected. As supplied, the full e256 characters are 
available with no reverse video. Because 16 locations are used for each 
character in the character generator ROM, a e73e is used. The first 128 
characters are fairly standard ASCII with some of the non-printables replaced 
with graphics. The second 128 are only half programmed leaving 64 that you 
could program yourself. The programmed 64 are line drawing graphics. So, if 
you choose reverse video you have the first 128 (the ASCII set) available, but 
you lose the line drawing. There is space on the card to add a socket and 
another set of 1¢e¢8 characters using a 2716, but this would have to be switched 
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manually if you use reverse video. You can also select all reverse video, but 
personally, I don't like it. The blanking when the CPU accesses the video RAM 
is evident. . 

Finally, a word on the decoding circuit. The only part that may need 
comment is the signal to the data direction gate on the Rabble board. The 
$DXXX switch must be open as screen RAM is now on the Rabble expansion. 
However the keyboard is’ still on the main board, so therefore the addresses 
$0800-GDFFF on the Rabble must be disabled so no conflict will occur. Those 
OF you who don't use buffers to the Rabble or who have modified the data 
direction circuit may have to think about what is appropriate for your setup. 
Also don't forget to pull the video RAM buffers on the main board to avoid 
conflict there. ' 

Programming the 6845 chip has been very well described in previous issues 
of KAOS and is also described in the manual for the card, so I won't say much 
about it here. Follow the examples in KAOS but remember the clock frequency 
is 17.43 MHz. For 88x24 the setup is given in the manual, just turn off the 
cursor. This is because OSI use a character as a cursor, so you won't need it 
and you'll lose it anyway if you select reverse video. Some setups are for 69 
Hz frame and some are 508 Hz. Most monitors will accept anything in this 
range, so don't try to calculate for exactly 5@ Hz. About monitors, I have 
seen modified TVs working with 8@xe4 but the result is poor. It can be 
improved by reducing the video output from the card to as low a level as 
possible without losing too much contrast. This can be done by changing a 
resistor divider on the video card. This helps because the TV circuits can 
respond to small video changes faster than large ones, giving effectively a 
better frequency response at low levels, so, if white on black is blurred, 
white on grey may not be. I have an Apple IIe monitor which is excellent, and 
so would most of the cheap monitors available, provided they are not modified 
TVs. 

I will try to answer enquiries from anyone needing more information. As 
I live in phone calls will be expensive but my address is 


aR a SSP eT PPP SP SSS 
Ciruits supplied with this article were not suitable for reproduction in the 
newsletter. If you would like copies, contact KAOS and we will post them to you 


The board mentioned in this article is available from: 
Australian Video Presentations, 325 Bank St, Sth Melbourne 3295 
Ph @3 699 4177 The cost is approx. $85.00 plus tax. 


HELP WANTED 


I have a C4 MF with a 48K Studiotech board and standard disk controller. I 
also have an 8" disk drive that I want to configure as the B drive and run 
both 5.25"? and 8" drives. Does any member have details of how to do this? 

Bob Best, 


FOR SALE 


C3 OEM OSI triple processor system, 6502, Z80, 6800, 56K static RAM, 8 slot 
backplane, e 68" drives, stacks of software on 9% 82 disks including CP/M, 
BASIC, Fortran, Cobol, Forth, Pascal, Macro, plus many hardware extras, OS 
manuals etc. Worth well over $6000. Sell for $2098 ONO. Also a GE Terminet 
hardcopy terminal, 119, 300, 12080 baud, including all operating/servicing 
manuals. Cost over $2000, sell $590. See Ron Cork or call 
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